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CPU-less Data Entry 

Application programs for the Pick operating 
system usually assume that only “dumb” terminals are 
attached to the computer, and the computer is 
responsible for correctly processing all keyboard input 
and all display screen output. Data entry programs for 
Pick are usually designed to prompt and accept input 
from the user on a field by field basis: every keystroke 
typed is transmitted to the CPU and echoed back, and 
each carriage return satisfies an INPUT statement that 
leads to a prompt for the next field. 

One disadvantage of that approach is that the 
computer spends a lot of time handling mundane I/O. 
Another disadvantage is that the user can only edit one 
field at a time, and only then by backspacing to erase 
characters. Desirable editing controls like “back up to 
the previous field” or “insert a word in this field” are 
completely unavailable, unless the data entry program 
contains lots of special code to support sophisticated 
editing beyond the built-in capabilities of the INPUT 
statement. 

An alternative approach is to depend on the 
editing capabilities commonly built into the “smart” 
terminals that are now widely available. By relying on 
the computer that exists in the terminal itself, a Pick 
data entry program can create a set of fields on the 
terminal’s display and wait for the user to fill in the 
fields using the terminal’s own (typically sophisticated) 
text editing capabilities, without any interaction at all 


from the Pick computer. When the user completes the 
form, its contents can be transmitted back to the Pick 
machine, and data processing can continue. 

Here’s an example of how such a system might 
work. (The discussion that follows assumes that 
terminal X is an imaginary model using a collection of 
various features found in commonly available devices 
such as those built by DEC, Wyse, and lots of other 
terminal manufacturers. Consult the documentation for 
your terminal to discover the actual features available to 
you, and how to invoke those features with special 
control codes.) The data entry program begins by 
painting the desired form on the terminal’s display 
screen. The form consists of various blank fields where 
data can be input by the operator. The rest of the screen 
is to be protected from editing by the user. 

Terminal X recognizes various control codes for 
defining protected and unprotected areas on the screen. 
For example, sending the terminal an ASCII escape and 
the letter “p” causes all positions from the current cursor 
location to the end of the display to be protected. An 
escape and the letter “u” causes all positions from the 
current cursor location to the end of the display to be 
unprotected and editable. Protected locations can be 
displayed differently from unprotected locations using a 
variety of video attributes, such as reverse video, dim, 
underline, and blinking. On terminal X, an escape and 
“G1 ” declares that protected locations should be 
displayed in reverse video. Unprotected locations will 
display in normal video by default. For our form, we 


want three unprotected fields of thirty character 
positions each: one field for a name, one for an address, 
and one for a city-state-ZIP. 

Now we have enough information to paint the 
form. Our program begins by telling the terminal we 
want reverse video for protected areas by executing 

PRINT CHAR (27) :"G1": 

Next, we move to the home position, clear the 
screen, and turn on protection for the entire screen 
(which causes it to display in reverse video) by 
executing 

PRINT @ (-1) :CHAR(27) :"P": 

Now we move to the starting position of our first 
editing field and declare it to be unprotected with 

PRINT @ (15,5) :CHAR(27):"U" : 

When we move to the end of the field and turn 
protection back on, we’re left with a completely reverse 
video screen except for one blank and unprotected field 
in row 5, column positions 15 through 45. That is 
accomplished with 

PRINT @ (45,5) :CHAR(27) :"P": 

Similarly, we can create our remaining two 
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They are clever, entertaining, and all learning is done right on the terminal. 
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unprotected fields in rows 7 and 9 with 

PRINT @ (15,7) :CHAR (27) : "U" : 

PRINT @ (45,7) :CHAR(27) :"P": 

PRINT @ (15, 9) :CHAR(27) :"U": 

PRINT @ (45,9) :CHAR(27) :"P": 

Finally, we show labels for our fields by 
displaying text just to the left of each field with 

PRINT @ (7,5) :"NAME": 

PRINT @(4,7) :"ADDRESS": ■ 

PRINT @ (0, 9) : "CITY ST ZIP": 

Now the blank, completed form is displaying on 
the screen, ready for input. To display an existing data 
record in the form, we just output data positioned inside 
each blank field with something like 

PRINT @(15,5) : "A NAME" "L#30": 

PRINT @(15,7) : "AN ADDRESS" "L#30": 

PRINT @ (15,9) : "A CTY-ST-ZIP" "L#30": 


Now we’re ready to let the terminal take control 
and handle all editing of the data until the operator is 
finished. Normally, our terminal operates in 
“conversational” mode, where every keystroke is sent to 
the Pick machine and echoed back for display on the 
terminal’s screen. However, terminal X also operates in 
“block” mode, which allows the operator to edit the 
unprotected fields on the display without intervention 
by the computer. Block mode begins when the terminal 
receives an escape and a “B”. From then on, the 
operator can use the cursor keys to position the cursor 
anywhere in any unprotected field and then overtype 
displayed data. The tab key makes the cursor jump to 
the next unprotected field, and control-tab jumps back 
to the previous field. Terminal X even has a special 
“insert mode” key that lets the operator type characters 
and insert them at the cursor position without 
overtyping existing data. 

All the while the operator is editing in block 
mode, nothing is being transmitted from the terminal to 
the computer. But once editing is complete, the 
operator can hit the “send” key. This causes terminal X 


to exit block mode and return to conversational mode, 
and to send the contents of all unprotected fields back to 
the computer as one block of data. The actual format of 
a terminal X block consists of the each field’s data 
separated by an ASCII 28 code and terminated with a 
carriage return. That means a program can input a 
block and break it into fields using the FIELD function 
in code like 

NAME = FIELD(BLOCK,CHAR(28),1) 
ADDRESS = FIELD(BLOCK,CHAR(28),2) 

CSZ = FIELD(BLOCK,CHAR(28) ,2) 

The main disadvantage of letting the terminal 
handle the editing instead of the computer is that the 
computer can’t interrupt to perform field validation or 
special updates. For example, if the operator is filling 
out an invoice form with multiple line items, there’s no 
way for the computer to calculate and display an 
updated invoice total as each line item is completed. 
(Although some very smart terminals include 
capabilities for letting the computer know when certain 


B-trees for Pick systems 



^^I'ired of waiting for your computer to SORT or SELECT your large dati 
files? Need to quickly find any attribute? Want to scroll files up or down, in 
any sort order? With B-TREE-P you can instantly search, sort, and scroll any 
data from any file! 

Now you can instantly look up customers by name, street. Zip code, or 
any other field — not just by customer number. Now you can immediately 
find inventory entries by quantity, cost, or description — not just by part 
number. Whatever files you use, now you can instantly locate and display 
your data any way you want, without having to wait for endless SORTs and 
SELECTS. 


Immediately display any record in any file just by typing one or more 
starting characters that match any field in the record. You can display not 
only a selected record, but also any previous and next records, using any 
sort order you specify. You can jump to any record in a file at any time, 
then browse through the file by scrolling up or down, a record at a time or a 
page at a time, in any sort order. 

As one of Semaphore's programmers says: "We often ask ourselves 
why we waited so long to create B-TREE-P. After using it for our own 
production work, we wonder how we ever got by before without it. A Pick 
computer without B-TREE-P is like a car without wheels". 

B-TREE-P is a proven collection of BASIC subprograms for using B-trees 
on your computer system. B-trees allow any of the data in any of your files 
to be instantly located and displayed in any sort order, without having to 
wait for SORT or SELECT commands. 

B-TREE-P and a few optional minor modifications to your existing data 
entry programs are all that is necessary for you to immediately be able to 
search, browse, display, or print your data quickly and conveniently. 
Modifications to your existing data files are absolutely unnecessary! 

Here are a few of the ways our customers have put B-TREE-P to work: 

• Within minutes of loading the B-TREE-P source code, one of our first 
customers began using B-TREE-P's standard "browser" for searching a 
120,000+ record customer master file. Any name, company, or address can 
immediately be located and displayed, just by typing one or more 
characters that match the field. No more waiting for SELECTs! 

• Another customer has set up B-TREE-P for purchase order inquiries. A 
file of multivalued line items and submultivalued delivery dates and 
quantities can instantly be viewed by item or by date. Pages can be 
scrolled at the terminal, forward or backward. Any range of data can be 


instantly printed. No more waiting for SORTs! 

• A California county jail uses B-TREE-P for inmate cash accounting. 
Although cash records are filed by inmate booking numbers, B-TREE-P allows 
a list alphabetized by the name attribute to be displayed at all times, even 
as records are created and deleted at other terminals. Any inmate record 
(or nearest match) can be immediately found and displayed just by typing 
one or more characters in a name. 

• A manufacturer uses B-TREE-P to let marketing personnel instantly 
display sales orders six different ways: by part, by description, by ship date, 
by sales rep, by customer name, and by sales territory. With just a few 
keystrokes, operators can instantly display records under a new sort (subsorts 
too) or find and output a given item. 

B-TREE-P includes all necessary BASIC source code for a B-tree system 
that works with any file. Included are an insertion subroutine, deletion 
subroutine, lookup subroutine, previous/next subroutine, and complete 
instructions. Plus, you receive the source code for a complete 
demonstration system that uses B-TREE-P to maintain a name and address 
file, including an editor program for creating and changing name and 
address records, a browser program for displaying records, and a printer 
program for listing file items in order without having to wait for a sort. 


To order, send your name, address, telephone 
number, and your check for $395 (plus tax in 
California) payable to Semaphore Corp. at 
207 Granada Drive, Aptos, CA 95003. Or call 
us at (408) 688-9200 for more information or to 
place a COD order. We'll send you complete 
B-TREE-P source code and all necessary 
documentation, along with all back issues of 
our special B-tree newsletter. 


B-TREE-P includes a license agreeement limiting your use of B-TREE-P to one computer at a time. Multi-CPU 
and OEM resale agreements are also available. Pick is a trademark of Pick Systems. 
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Questions Most Frequently Asked 

About STRIDE/Z 

1. What is STRIDE/Z? 

STRIDE/Z is an integrated package of manufacturing software for General 
Automation Zebra computers using the Pick operating system. STRIDE/Z is a 
product of Semaphore Corporation. 


2. What software is included in the STRIDE/Z package? 

STRIDE/Z includes 18 modules to automate every aspect of a 
manufacturing company: accounts payable, accounts receivable, cost 
accounting, customer service, engineering, fixed assets, general ledger, 
inspection, order entry, payroll, personnel, production control, programming, 
purchasing, receiving, shipping, shop floor, and stock room. The production 
control module includes regenerative Materials Requirement Planning. 

STRIDE/Z consists of approximately 200 programs, 350 procs, 80 formatted 
screens, 655K bytes of online user documentation, and 225K bytes of online 
programmer cross reference documentation. The approximately 100 files in 
STRIDE/Z require 2.5 million bytes of disk space for installation. STRIDE/Z uses no 


assembler code. ^ ^ 

i. Why is STRIDE/Z better than other manufactyring packages? 

STHDE/Z works. It was developed fro^scratch over a two year period 
jn actual electronics manufacturer, as sales climbed from $10 million to over 


$20 million. 


STRIDE/Z has a clean, modular, well-structured, and conceptually integrated 
design. All design and implementation work was the effort of an individual 
programmer. Unlike other large software products, STRIDE/Z is not a collection 
of ad hoc patches and multiple programming styles. 

STRIDE/Z simultaneously and correctly updates multiple files as soon as 
transactions are entered, in order to provide a database that is always up to 
date, and to avoid unfriendly batch-style processing, 

STRIDE/Z is well-documented, especially for the programmer. Extensive 


cross-references carefully document all program, proc, and data 


.1 



interdependencies, so that modifications 
are easy and predictable. 

And STRIDE/Z is inexpensive. 

4. How can I find out more about STRIDE/Z? 

Call or write Semaphore Corporation, 
207 Granada Dr., Aptos, CA 95003, 
(408)688-9200. 




The Pick Mailing List 

CREAM of the CROP 

The 3,000 most responsive Pick users' names and 
addresses. Only $150 plus tax for one-up adhesive 
labels, sorted, printed, and delivered. Send no 
payment without first obtaining our order form and 
one-time use agreement. 

P Mail by Marianne • 1893 Nadina St. • Seaside CA 93955 


Semaphore Corporation welcomes its 
newest B-TREE-P customer: 

Chick-Fil-A 


operator functions are being performed, such as tabbing out of a field.) 

Because block mode editing occurs completely off-line with no 
computer interaction, it’s especially well suited for tasks like the initial 
input of records for a file where validation isn’t particularly important. As 
a final example, here’s a terminal X program to create a file of names and 
phone numbers: 

EQU esc TO CHAR (27) , fs TO CHAR (28) 

OPEN "NAMES" ELSE STOP "No names ! " 
protect = esc:"P" ; enable = esc:"U" 

PRINT esc: "Gl" : ; * make protected areas reverse video 
PRINT @ (-1) :protect: ;* protect whole screen 
PRINT @ (15, 7) :enable:@ (45) :protect: ;* enable name 
PRINT 0(15,9) :enable: 0 (27) :protect: ; * enable phone 
PRINT 0(9,5):"ID":@(7,7):"NAME":@(6,9):"PH0NE": 

ID = 1 ;* start with first record in file 
LOOP 

READ ITEM FROM ID ELSE ITEM = "" ; * get record 
PRINT @ (15, 5) : ID: ; * show record number 
PRINT @(15,7) :ITEM<1>: ; * name 
PRINT @ (15, 9) : ITEM<2>: ;* phone number 
PRINT 0 (15,7) : ; * leave cursor in first field 
PRINT esc:"B": ;* put terminal in block mode 
INPUT BLOCK ; * get result of operator edits 
ITEM<1> = FIELD (BLOCK, fs, 1) ; * get new name 
UNTIL ITEM<1> = "" DO ;* continue until name is null 
ITEM<2> = FIELD (BLOCK, fs,2) ;* get new phone 
IF ITEM<2> MATCHES "3N' 3N' 4N" THEN ; * phone ok 

WRITE ITEM ON ID ; ID=ID+1 ;* save new record 
END 
REPEAT 

PRINT 0 (-1) : enable: ;* unprotect whole screen 
STOP 
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Unlock the Secret 
in Your Computer! 


Pragma (not to be 
confused with 
Pragma's Product 
Profiles ) is the 
original 48-page 
technical journal for 
Pick users published 
quarterly beginning 
in August 1982. 
Each issue is packed 
with software and 
helpful information,. 
including complete 
and debugged 
program listings and 
detailed, explanatory 
articles for readers at 
all levels of 
experience. Order 
your Pragma issues 
today and begin 
unlocking the secrets 
in your Pick system! 

Send $25 for 
each 48-page 
hack issue to: 
Pragma, 207 
Granada Dr., 
Aptos, CA 
95003 


Pragma #1: 

Welcome to Pragma ° 
ZIP Code File Design 
° A Program for 
Renumbering 
Statement Labels ° 
Deriving Year-to-Date 
Counts ° VANILLA, 
The No-Frills 
Manufacturing 
System: The Parts 
File ° Molectron User 
Profile ° More 
Memory, Fewer 
Reads ° SYSMAP: A 
Cross-Reference 
System ° How to Flag 
Missing Checks ° 23 
Wish List Items ° 
Computing Modulos 
with ENGLISH ° 
Building ENGLISH 
Headings with Proc ° 
4 Queries ° Making 
Item Identifiers Hash 
Well ° Tape Handling 
° Patching the Exit 
Problem in 3.2 
SCREENPRO ° The 
Shell Game. 

ossyE m 

OS A 

l^EIF^DIMT 


Pragma #2: We 

Have Liftoff ° A 
Modulo Setting 
Program ° Black Box 
Formatting ° 
TRIM.DELIM and 
PROFILE Utilities ° 
SYSMAP, A Cross- 
Reference System: 
File Format Input ° 
Galinski Hamburg 
User Profile ° LOOP 
vs. LOCATE 
Benchmarks ° 25 
Wish List Items ° An 
Introduction to 
ENGLISH: Jargon ° 
Proc Conversions 0 
VANILLA, The No- 
Frills Manufacturing 
System: Bill of 
Material Input ° 14 
Queries ° The 
Trouble Tree 0 2 
Letters ° A Switchbox 
for 32 Ports ° Security 
and the DATA/BASIC 
Programmer ° The 
Cookie Game ° Some 
New Subscribers. 


Pragma #3: Is 

Pragma a Rare 
Medium, Well Done? 
° Edit Aides 0 A Proc 
for Cross-Referencing 
Q-Pointers ° 
SYSMAP, A Cross- 
Reference System: 
Remaining File Input 
° Rainbow Natural 
Foods User Profile ° 
More BASIC 
Benchmark 
Comparisons ° 
Justifying Ragged 
Output ° 13 Wish List 
Items ° Generating 
Monthly Column 
Headings ° VANILLA, 
The No-Frills 
Manufacturing 
System: Purchasing 
° 5 Queries ° An 
Introduction to 
ENGLISH: More 
Commands ° Shared 
Site Checklist ° 
Converting Paint to 
Programs 0 3 Letters 
° Generating Blank 
Forms ° Animal, A 
Game That Learns ° 
More New 
Subscribers. 


Pragma #4: Survey 
Says... ° Pacific 
Valley Bank User 
Profile ° SYSMAP, A 
Cross-Reference 
System: Diets and 
Procs ° Uncompiling: 
Unassembling Stack 
Code ° Left vs. Right 
Justification 
Benchmarks 0 4 Wish 
List Items ° A 
Comparison of BASIC 
Implementations ° 
More New 
Subscribers 0 An 
Undocumented Editor 
Capability ° 3 Local 
User Group Reports ° 
Avoiding Saved Lists 
with PQ-RESELECT 
° Self-Documenting 
Reports ° A Query ° A 
Survey of Hardware 
that Supports Pick- 
Style Software ° 
Printer Trade-Offs ° 
An Introduction to 
ENGLISH: Finding 
Files ° A Letter ° 
VANILLA, The No- 
Frills Manufacturing 
System: Purchase 
Order Entry ° The 
Swat! Game. 


Pragma #5: Happy 
Birthday! 0 Interactive 
Systems Producer 
Profile ° Uncompiling: 
Regenerating Source 
Code 0 A Day of 
Revelation ° IBM 
Personal Computer 
vs. Microdata Reality 
Benchmarks 0 
VANILLA, The No- 
Frills Manufacturing 
System: Receiving ° 
3 Wish List Items ° 
An Introduction to 
ENGLISH: Being 
Choosy ° Converting 
Manual Paint to 
Programs ° 6 Local 
User Group Reports ° 
More New 
Subscribers ° A 
Program That 
Reports File Pointer 
Locations ° Boiler 
Plate Processing with 
Runoff 0 A New 
Query and an Old 
Query Answered ° 
SYSMAP, A Cross- 
Reference System: 
Automation 0 Tape 
Types ° 6 Letters ° 
Permuted Index to 
the First 4 Issues of 
Pragma 0 Amazing, a 
Maze Game. 


Pragma #6: Pick Pie 
Pictured ° The 
Ubiquitous POINTER- 
FILE ° Uncompiling: 
Resolving Labels ° 
An Introduction to 
ENGLISH: Syntax 
Overview ° AccuSoft 
Producer Profile ° 
Rounding Out 7 
Benchmarks On 5 
Machines ° Designing 
Data Entry Programs 
° 12 Wish List Items 0 
GET: An Input 
Processor ° 5 Local 
User Group Reports 0 
More New 

Subscribers ° Do You 
Know Your Proc 
Limits? ° VANILLA, 
The No-Frills 
Manufacturing 
System: Inspection ° 
2 Queries ° Individual 
Accounts or Shared 
Accounts? ° Lock 
Logic Illustrated ° 
Password Protection 
° Two Undocumented 
Conversions 0 A 
Letter ° How 
AMAZING Works. 


Pragma #7: More 
New Subscribers ° A 
New Machine Visits 
Pragma 0 Bantam 
Hardware Overview 0 
Suppressing 
LOCKED Clauses ° 
An Introduction to 
ENGLISH: WITH, BY 
and TOTAL ° Bantam 
Producer Profile ° 
VANILLA, The No- 
Frills Manufacturing 
System: Disposition 0 
A Bantam Diary ° 
New Benchmark 
Timings for 8 More 
Machines ° 6 Local 
User Group Reports ° 
GET: Source Code ° 
A Preprocessor for 
Symbolic Statement 
Labels ° 2 Wish List 
Items ° 3 Queries 0 
Bantam Software 
Overview ° A Letter ° 
The Slide Game. 


Page 6 • Pragma’s Product Profiles #44 


















Four programs for connecting 
your Macs to a Zebra. 



You can use FreeTerm: a simple text-only software emulator that turns your Mac 
into an ASCII terminal. There's no cursor control, but it does support X-on/X-off, 
and it's in the public domain. 



Or you can use Red Ryder: a former try-before-you-buy "shareware" product, this 
software is now a commercial offering. It supports lots of protocols, but still 
doesn't do much more than let your Mac input and display text. 


0 


■ 

Q 

V 



Or you can use MacTerminal: developed by Apple, this software turns your Mac 
into a complete (but slow) VT100 terminal. Still, it's only text-based, and all the 
power of your Mac goes wasted. 


Or you can use Telefolders: sophisticated software that lets you tie your Zebra 
and Macs together, without losing the point-and-click power of the Macintosh 
interface. Mac files saved on the Zebra appear as standard icons, folders, and 
windows. To copy any Mac-style program, data, or document from the Zebra to 
your Macintosh, just click on the icon you want and select "Receive" from the 
Mac's pull-down menu. Each Mac also has access to its own private folder, for 
sending and receiving electronic mail via the Zebra. 

Telefolders host software for the Zebra is $995. A starter kit of Telefolders software 
for the Macintosh is $49.95, and includes four free hours of access to Semaphore's 
own Zebra host, which features a large collection of Macintosh public domain 
software. 

To order, or to receive more information, contact Semaphore Corporation, 

207 Granada Drive, Aptos, CA 95003, (408) 688-9200. 










New B-TREE-P installations 
are sprouting up every day! 



B-TREE-P is software 
that allows your data to 
be instantly located and 
output, without having 
to wait for lengthy file 
sorts or searches. Join 
the growing number of 
sites discovering the 
power and flexibility of 
B-TREE-P, Write or 
call Semaphore Corp,, 
207 Granada Drive, 
Aptos, CA 95003, 

(408) 688-920^ 
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Express Inc. • Compu Components • Monterey County • Butterfields • Electronic Business • Kreepy 
Krauly USA • Tennessee Mat Co. • Zircon Co. Inc. • Smithsonian Institution • Call U.S. Inc. • Meditech 
• Unison Technologies Inc. • Wavetek • Moore Industries • Systems Support Services • Aerojet 
General • Target Supply • Lilyblad Petroleum • Partners National Health Plans • M. Epstein Inc. • Vitek 
Systems Inc. • J & L Industrial Supply Co. Inc. • Century Publishing Co. • Northwest Agricultural Coop 
Assoc. • Tampa Bay Mgmt. Services Inc. • Spectradyne Inc. • Crosstern Corp. • Magic Chef Air 
Conditioning Co. • Educators Mutual Insurance • Samuelson Assoc. Co. • Anthony Pools • Brooks 
Equipment Co. Inc. • Associated Students UCLA • Laub Group Inc. • United Collection Bureau Inc. • 
Pactel Paging • Access Software Inc. • Bronson & Bratton Inc. • ACS Systems Inc. • Topsy’s 
International Inc. • Opportunities Unlimited • Glastron-Conroy Ltd. • XScribe Corp. • Minnesota Trade 
Office • Berelson Co. • San Mateo County • Creative Computer Services • Livermore Police Dept. • 
Hubert Distributing Co. • Reinsurance Assoc. • Oman Publishing • Capital Software Ltd. • Martin 
Cadillac Co. Inc. • NORPAC • AIPAC • Medical Accounting Systems • Sierra Software Inc. • May 
Trucking • Shoob Photography • Specialty Underwriters Inc. • Specs Music • ADDS Inc. • Excalibur 
Computer Systems Inc. • City of Irvine • Cornell University • Office Works • Assertive Systems • 
Conston Inc. • Wofford College • Chicago Kenworth • Eye Care & Surgery Center • Chandler Lumber 
Co. • Mark Card • Penn Independent Assoc. Inc. • Condominium Insurance • John Klein & Assoc. 
Inc. • Cooke Data Systems Inc. • Infocel • Multisystems Inc. • Generation Research • Miami Trading 
Enterprises • System Works Inc. • Flynt Systems Corp. • Life & Health Insurance Co. of America • 
Information Technology Consultants • Tel-A-Train Inc. • Data Operating Systems Inc. • Computyme • 
Stewart Co. • Trudell Trailer Sales Inc. • NCAR • Jet Electronics & Technology Inc. • Distributed Logic 
Corp. • University of California • Casualty Underwriters Inc. • Halprin Supply Co. • Long Beach 

Community Services. 
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